10 G:CLEAR; FULL; BORDER 14
20 *LOOP
30 C:L=L+1
40 G:DRAW L; TURN 92
50 J(L<220):*LOOP
60 G:GOTO 0,0; TURNTO 0
70 C:R=RND(1)*16
80 G:PEN R; BORDER 15-R
90 C:L=0
100 J:*LOOP